 ,      
(, ORGBASE.DBF)   :

IF !USED("ORGBASE")
   SELECT 0
   USE ORGBASE
ENDIF

    ,   
 Replace   TableUpDate 
 . , 
,  ,    
CURSORGETPROP("buffering").   
,  1  ,  .
:

IF CURSORGETPROP("buffering")>1
   =TableUpdate(.T.)
ENDIF

  TableUpdate:

.T. -    
.F. -     
